From 39fb658dbf57c5063ded560332d19d45a34078ad Mon Sep 17 00:00:00 2001
From: justbur <justin@burkett.cc>
Date: Mon, 16 Nov 2015 21:57:59 -0500
Subject: [PATCH] Turn on case-sensitivity in replacements

Should avoid situations like #84
---
 which-key.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/which-key.el b/which-key.el
index 93cda2c8e25..1243bc02806 100644
--- a/which-key.el
+++ b/which-key.el
@@ -1080,7 +1080,8 @@ to replace and the cdr is the replacement text.  Unless LITERAL is
 non-nil regexp is used in the replacements.  Whether or not a
 replacement occurs return the new STRING."
   (save-match-data
-    (let ((new-string string))
+    (let ((new-string string)
+          case-fold-search)
       (dolist (repl repl-alist)
         (when (string-match (car repl) new-string)
           (setq new-string
-- 
2.30.2